RRRRRRRRRRRR UUU UUU NNN NNN 000000000 FFFFFFFFRRRFFFRFR FRFRRRRRRRRRPRFFF 
RRRRRRRRRRRR UUU UUU NNN NNN 000000000 FFFFFFFRFRRRFRRRFR FRRRRRRPRRPPR PPE 
RRRRRRRRRRRR UUU UUU NNN NNN 000000000 FFFFFRRRFRRRRFRFR FPRRRRRRRRRR FFF 
RRR RRR UUU UUU NNN NNN 000 000 FFF FFF 

RRR RRR UUU UUU NNN NNN 000 OOO FFF FFF 

RRR RRR UUU UUU NNN NNN 000 OOO FFF FFF 

RRR RRR UUU NNNNNN NNN 000 000 FFF FFF 

RRR RRR UUU UUU NNNNNN NNN 000 000 FFF FFF 

RRR RRR UUU UUU NNNNNN NNN 000 000 FFF FFF 
RRRRRRRRRRRR UUU UUU NNN NNN NNN 000 OOO FFFFFFFFFFFF FFFFFFFFFFFF 
RRRRRRRRRRRR UUU UUU NNN NNN NNN 000 COO FFFFFFFFFFFF FFFFFFFFFFFF 
RRRRRRRRRRRR UUU UUU NNN NNN NNN OOO OOO FFFFFFFFFFFF FFFFFFFFFFFF 
RRR = RRR UUU UUU NNN NNNNNN 000 000 FFF FFF 

RRR = =RRR UUU UUU NNN NNNNNN 000 000 FFF FFF 

RRR = =RRR UUU NNN NNNNNN 000 FFF FFF 

RRR R UUU UUU NNN NNN 0O0G 000 FFF FFF 

RRR RRR UUU UUU NNN NNN 000 000 FFF FFF 

RRR RRR UUU UUU NNN NNN 000 000 FFF FFF 

RRR RRR UUUUUUUUUUUUUUU NN NNN 000000000 FFF FFF 

RRR RRR UUUUUUUUUUUUUUU NNN NNW 000000000 FFF FFF 

RRR RRR UUUUUUUUUUUUUUU =~ NNN NNN 006000000 FFF FFF 
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! 
Version: *v04-000' 


ASSESS ALISI SST IT TTT TTT TTP rrr rei TITS TTI ITIL LitiLitiLitiit 
' 


ie COPYRIGHT (c) 1978, 1980, 1982, 1984 8 
ie DIGITAL EQUIPMENT CORPORATION, MAYNARD. MASSACHUSETTS. 
ie ALL RIGHTS RESERVED. 


:* THIS SOFTWARE IS pent sneo UNDER A LICENSE AND MAY BE USED AND COPI 
:* ONLY IN ACCORDANCE WITH THE TERMS OF SUCH Tarts ae AND WITH T 
tt INCLUSION OF THE ABOVE opt dd NOTICE. THIS sot ARE OR ANY OT 

't COPIES THEREOF MAY_N 7 BE PROVIDED OR OTHERWISE MADE AVAILABLE TO A 
:* OTHER PERSON. NO TITLE TO AND OWNERSHIP OF THE SOFTWARE IS HERE 


® 
® 
® 
. 7 
® 
® 
® 
os 
® 
® 
ie TRANSFERRED. . 
tr 
® 
® 
® 
® 
® 
« 
* 
7 
* 


ED 
HE 
HER 
NY 
BY 
‘* He gre IN THIS SOFTWARE IS SUBJECT TO CHANGE WITHOUT NOTICE 
:* SHOULD NOT BE CONSTRUED AS A COMMITMENT BY DIGITAL EQUIPMENT 
He CORPORAT ION. 

:* DIGITAL ASSUMES NO RESPONSIBILITY FOR THE USE OR RELIABILITY OF ITS 
:* SOFTWARE ON EQUIPMENT WHICH IS NOT SUPPLIED BY DIGITAL. 


SRO ERRATA ERATE AERA RARER HEAARERE EEE 
' 


‘ee 
! FACILITY: DSR (Digital Standard RUNOFF) / DSRPLUS 


ABSTRACT: 
Converts BLISS/VARIANT values into useful names. 


ENVIRONMENT: Transportable BLISS 


i 

i] 

i 

i 

' 

i 

AUTHOR: Rich Friday 

: CREATION DATE: 1978 

MODIFIED BY: 

016 KAD00016 Marshall 19-Mar-1984 

Added GERMAN, FRENCH & ITALIAN 

i 015 KAD00015 Keith Dawson 18-Apr-1983 

: Made the LNO1 conditional the default for vanilla DSR -- 
its value is 0 (no variant supplied). 

i 014 KAD00014 Keith Dawson | 22-Mar-1983 

: Asserted the LNO1 conditional when DSRPLUS is asserted. 
i 013 KAD00013 Keith Dawson 20-Mar-1983 

Removed all references to .BIX and .BIC files. 

012 KAD00012 Keith Dawson 07-Mar-1983 


Global edit of all modules. Updated module names, idents, 
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: copyright dates. Changed require files to BLISS Library. 


lee 

: DEFINITION OF /VARIANT BITS 

! The bit assignments are as follows: 

Bit Weight Meaning 

i -- 0 If no /VARIANT is supplied (as for vanilla DSR). 
! compile with LNO1 support. LNO1 support is also. 
implied by the DSRPLUS variant. 

i 0 1 CLEAR = Unassigned 

: SET = Unassigned 

i 1 2 CLEAR = Normal compile 

SET = Compile for DSRPLUS 

i 4-6 =—-:'16 CLEAR = English (American) version 

‘ SET = 16 = German (Austrian) 

' 32 = French 

} 48 = Italian 


This variable (LNO1) controls whether or not to compile an LNO1-flavored 
DSR. It is asserted by default, and also whenever DSRPLUS is asserted. 


! 
' 
‘ 
Modules utilizing LNO1 are: 
i DOOPTS NOUT 
COMP ILETIME 

( (ZVARIANT EQL 0) OR XVARIANT/2 ) 


This variable (DSRPLUS) controls compilation for the DSRPLUS program. 
i ALL modules utilize DSRPLUS. 


COMPILETIME 

dsrplus = 
( ZVARIANT/2 ) 
' ewer wen renwneosr 2 eH HK wm wm em Dw eB BE OO ewe = weer wTrere eee tre BBO KM BO BOBO we rm ewer e errr wre ere Zw eee sec = 
' This variable (FLIP) controls compilation of FLIP features of DSRPLUS. 
} It assures that FLIP features are compiled only on VMS systems. 
! Modules utilizing FLIP are many and various. 
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etal | Ma 
% RVARIANT/2 AND XBLISS(BLISS32) ) 


LEAR = ig’: Ge (American) version 

ET = German (Austrian) 

= French 

i = Italian 

cOnPILET Ine = ( ZVARIANT/16 AND NOT XVARIANT/32 AND NOT %VARIANT/64 ) ; 
Fre = ( NOT ZVARIANT/16 AND Z%VARIANT/32 AND NOT X%VARIANT/64 ) ; 

COMPILET IME 

Italian = ( RVARIANT/16 AND %VARIANT/32 AND NOT BVARIANT/64 3 


End of RNODEF .REQ 


; 
COMPILET IME 
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